source('G:/Git/R-practice/chapter12/chapter12-1.R')
print(class(diamonds))
print(head(diamonds))
library(dplyr)
print(head(diamonds))
